perm filename HAL.CRF[HAL,HE]2 blob sn#123614 filedate 1974-10-08 generic text, type T, neo UTF8
≠COMMEN≡	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 1
	HAL PAL[HAL,HE]	PAGE 1 	

≥				COMMENT ⊗   VALID 00002 PAGES
≥				C REC  PAGE   DESCRIPTION
≥				C00001 00001
≥				C00002 00002	.TITLE HAL Runtime System
≥				C00003 ENDMK
≥					C⊗;
≠.TITLE≡	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 2
	HAL PAL[HAL,HE]	PAGE 2 	

≥					.TITLE HAL Runtime System
≥					
≠.XLIST≡≠.INSRT≡≠COMMEN≡≠.SBTTL≡≠.MACRO≡≤STSW≠≤STSW≡≠.IFNDF≡≡FLOAT≡≠.SBTTL≡≡ERRTRP≠≡ILGINS≠≡CLKTRP≠≡RUG≠≡PS≠≡KBIS≠≡KBIR≠≡KBOS≠≡KBOR≠≡CLKCNT≠≡CLKSET≠≡CLKS≠≡STRT11≠≡IBUF≠≡OBUF≠≡HCOR≠≡%7≡≡PC≠≡%6≡≡SP≠≡%5≡≡RF≠≡%4≡≡R4≠≡%3≡≡R3≠≡%2≡≡R2≠≡%1≡≡R1≠≡%0≡≡R0≠≡%5≡≡AC5≠≡%4≡≡AC4≠≡%3≡≡AC3≠≡%2≡≡AC2≠≡%1≡≡AC1≠≡%0≡≡AC0≠≡MARK0≠≡MARK1≠≡MARK2≠≡MARK3≠≡MARK4≠≡MARK5≠≡TEMP≠≠.WORD≡≠RTI≡≠RTI≡≡TEMP≡≠.MACRO≡≤ROUTIN≠≠.MACRO≡≤CALL≠≠.MACRO≡≤FP≠≠.LIST≡≠.MACRO≡≤XX≠	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 3
	HALHED PAL[HAL,HE]	PAGE 4 	DEFS -- standard definitions for HAL runtime routines

≥					.MACRO	XX SYM			;Just gives SYM the next number.
≥						SYM == II
≥						II == II+2
≥					.ENDM
≥					
≠.MACRO≡≤PUTLOC≠≥					.MACRO PUTLOC	ADR,VAL
≥						II==.
≥						.= ADR
≥						VAL
≥						.=II
≥					.ENDM
≥					
≠.MACRO≡≤TT≠≥					.MACRO TT INX,VAL
≥						.=II+INX
≥						VAL
≥					.ENDM
≥					
≥					;SMALL BLOCK DESCRIPTOR FORMAT
≥					
≡II≠≥		000000				II == 0
≤XX≡≥						XX	IDFLAG	;ACTUALLY A BYTE -- GETS PUT IN ID PART OF TAG WORD
≡II≡≡IDFLAG≠≥		000000				IDFLAG == II
≡II≡≡II≠≥		000002				II == II+2
≤XX≡≥						XX	MAPRTN	;ROUTINE TO BE CALLED ON MARK
≡II≡≡MAPRTN≠≥		000002				MAPRTN == II
≡II≡≡II≠≥		000004				II == II+2
≤XX≡≥						XX	SIZE	;How many words for a value cell in this type block.
≡II≡≡SIZE≠≥		000004				SIZE == II
≡II≡≡II≠≥		000006				II == II+2
≤XX≡≥						XX	NPERB	;NUMBER OF BLOCKS PER BUFFER
≡II≡≡NPERB≠≥		000006				NPERB == II
≡II≡≡II≠≥		000010				II == II+2
≤XX≡≥						XX	GCFG	;SET IF THIS IS NOT A COLLECTABLE AREA
≡II≡≡GCFG≠≥		000010				GCFG == II
≡II≡≡II≠≥		000012				II == II+2
≤XX≡≥						XX	NMIN	;MIN NUMBER OF FREE BLOCKS TO BE RETURNED BY GC
≡II≡≡NMIN≠≥		000012				NMIN == II
≡II≡≡II≠≥		000014				II == II+2
≤XX≡≥						XX	NPCT	;MIN % OF FREE BLOCKS TO BE RETURNED BY GC
≡II≡≡NPCT≠≥		000014				NPCT == II
≡II≡≡II≠≥		000016				II == II+2
≤XX≡≥						XX	NXTSID	;NEXT BLOCK ON ID CHAIN 
≡II≡≡NXTSID≠≥		000016				NXTSID == II
≡II≡≡II≠≥		000020				II == II+2
≤XX≡≥						XX	FFREE	;FREE LIST
≡II≡≡FFREE≠≥		000020				FFREE == II
≡II≡≡II≠≥		000022				II == II+2
≤XX≡≥						XX	FSTBUF	;OLDEST BUFFER
≡II≡≡FSTBUF≠≥		000022				FSTBUF == II
≡II≡≡II≠	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 4
	HALHED PAL[HAL,HE]	PAGE 4.1 	DEFS -- standard definitions for HAL runtime routines

≥		000024				II == II+2
≤XX≡≥						XX	LSTBUF	;NEWEST BUFFER
≡II≡≡LSTBUF≠≥		000024				LSTBUF == II
≡II≡≡II≠≥		000026				II == II+2
≤XX≡≥						XX	NALLOC	;NUMBER ALLOCATED
≡II≡≡NALLOC≠≥		000026				NALLOC == II
≡II≡≡II≠≥		000030				II == II+2
≤XX≡≥						XX	NFREE	;NUMBER FREE
≡II≡≡NFREE≠≥		000030				NFREE == II
≡II≡≡II≠≥		000032				II == II+2
≡II≡≡SPCHDR≠≥		000032				SPCHDR == II
≥					
≥					;; EACH BUFFER
≡II≠≥		000000				II == 0
≤XX≡≥						XX	NXTBUF	;NEXT BUFFER
≡II≡≡NXTBUF≠≥		000000				NXTBUF == II
≡II≡≡II≠≥		000002				II == II+2
≤XX≡≥						XX	PRVBUF	;PREVIOUS BUFFER
≡II≡≡PRVBUF≠≥		000002				PRVBUF == II
≡II≡≡II≠≥		000004				II == II+2
≤XX≡≥						XX	LSTBLK	;ADDRESS OF LAST BLOCK IN THIS BUFFER
≡II≡≡LSTBLK≠≥		000004				LSTBLK == II
≡II≡≡II≠≥		000006				II == II+2
≤XX≡≥						XX	FSTBLK	;POINTS AT FIRST LOCN
≡II≡≡FSTBLK≠≥		000006				FSTBLK == II
≡II≡≡II≠≥		000010				II == II+2
≡II≡≡BUFHDR≠≥		000010				BUFHDR == II
≥					
≥					;; EACH BLOCK
≡II≠≥		000000				II == 0
≡TAG≠≥		177777				TAG == -1	;≠0 MEANS INUSE (USED IN GC)
≡TAGID≠≥		177776				TAGID == -2	;USED TO HOLD AN "ID" FOR THIS RECORD
≤XX≡≥						XX	WORD0	;FIRST DATA WORD
≡II≡≡WORD0≠≥		000000				WORD0 == II
≡II≡≡II≠≥		000002				II == II+2
≥					
≥					;;GC METHODS
≡II≠≥		000000				II == 0
≤XX≡≥						XX	METH	;ROUTINE TO CALL
≡II≡≡METH≠≥		000000				METH == II
≡II≡≡II≠≥		000002				II == II+2
≤XX≡≥						XX	NXTMTH	;NEXT ON CHAIN
≡II≡≡NXTMTH≠≥		000002				NXTMTH == II
≡II≡≡II≠≥		000004				II == II+2
≥					
≠.MACRO≡≤MMETH≠≥					.MACRO MMETH ROUT
≥						ROUT
≥						0
≥					.ENDM
	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 5
	HALHED PAL[HAL,HE]	PAGE 4.2 	DEFS -- standard definitions for HAL runtime routines

≥					
≥					;;SPECIAL SPACES
≠.IF2≡≥					.IF2
≡SIDCHN≡≡SIDHED≠≥		017276				SIDHED == SIDCHN ;SO AUTOMATIC LINKAGE WORKS
≥					.ENDC
≥					
≡SIDCNT≠≥		000000			SIDCNT == 0;
≡SIDCHN≠≥		000000			SIDCHN == 0;
≥					
≠.MACRO≡≤DEFSPC≠≥					.MACRO DEFSPC ID,MMRT,SZ,NPB,GCF,NMN,NPC
≥					    .IFNDF ID
≥						SIDCNT==SIDCNT+1
≥						ID==SIDCNT
≥					    .ENDC
≥					    II==.
≥					    .BLKW SPCHDR/2
≥						TT	IDFLAG,ID
≥						TT	MAPRTN,MMRT
≥						TT	SIZE,SZ
≥						TT	NPERB,NPB
≥						TT	GCFG,GCF
≥						TT	NMIN,NMN
≥						TT	NPCT,NPC
≥						TT	NXTSID,SIDCHN
≥						TT	FFREE,0
≥						TT	FSTBUF,0
≥						TT	LSTBUF,0
≥						TT	NALLOC,0
≥						TT	NFREE,0
≥					    .=II+SPCHDR
≥					    SIDCHN == II
≥					    .IF2
≥						.IFGE MAXIDF-ID
≥						    II==.
≥						    .=SIDTBL+<ID*2>
≥						    SIDCHN
≥						    .=II
≥						.ENDC
≥					    .ENDC
≥					.ENDM
≥					
≡MAXIDF≠≥		000030			MAXIDF == 30	;MAX INDEX INTO SIDTBL
≥					
≠.XLIST≡≡II≠≤XX≡≡II≡≡DATUM≠≡II≡≡II≠≤XX≡≡II≡≡LINKF≠≡II≡≡II≠≤XX≡≡II≡≡LINKB≠≡II≡≡II≠≡II≠≤XX≡≡II≡≡NXTGN≠≡II≡≡II≠≤XX≡≡II≡≡PRVGN≠≡II≡≡II≠≤XX≡≡II≡≡INVMRK≠≡II≡≡II≠≤XX≡≡II≡≡GNVAL≠≡II≡≡II≠≤XX≡≡II≡≡GNDEPS≠≡II≡≡II≠≤XX≡≡II≡≡GNCLCS≠≡II≡≡II≠≤XX≡≡II≡≡GNCHGS≠≡II≡≡II≠≡II≠≤XX≡≡II≡≡NXTCLC≠≡II≡≡II≠≤XX≡≡II≡≡NEEDED≠≡II≡≡II≠≤XX≡≡II≡≡FORM≠≡II≡≡II≠≡II≠≤XX≡≡II≡≡NXTCHG≠≡II≡≡II≠≤XX≡≡II≡≡CHGCOD≠≡II≡≡II≠≡STRT11≡≠.INSRT≡≠COMMEN≡≠.SBTTL≡≠.EVEN≡≡TYPSTR≠≠MOV≡≡R0≡≡R1≡≠MOVB≡≡R1≡≡R0≡≡TSLOOP≠≠JSR≡≡PC≡≡TYPCHR≡≠MOVB≡≡R1≡≡R0≡≠BNE≡≡TSLOOP≡≠RTS≡≡PC≡≡TYPDEC≠≠MOV≡≡RADIX≡≠BR≡≡TYPDIG≡≡TYPOCT≠≠MOV≡≡RADIX≡≠BR≡≡TYPDIG≡≡TYPDIG≠≠MOV≡≡R0≡≡R1≡≠CLR≡≡R0≡≠DIV≡≡PC≡≡R0≡≡RADIX≠≠BEQ≡≡TYPOUT≡≠MOV≡≡R1≡≡SP≡≠JSR≡≡PC≡≡TYPDIG≡≠MOV≡≡SP≡≡R1≡≡TYPOUT≠≠ADD≡≡R1≡≠MOV≡≡R1≡≡R0≡≡TYPCHR≠≠TSTB≡≡KBOS≡≠BPL≡≡TYPCHR≡≠MOVB≡≡R0≡≡KBOR≡≠CMP≡≡R0≡≠BNE≡≡TYPRET≡≠CLR≡≡R0≡≠JSR≡≡PC≡≡TYPCHR≡≠JSR≡≡PC≡≡TYPCHR≡≠JSR≡≡PC≡≡TYPCHR≡≡TYPRET≠≠RTS≡≡PC≡≠.MACRO≡≤OUTSTR≠≠.MACRO≡≤NUMOUT≠≠.MACRO≡≤ASCIE≠≠.MACRO≡≤CRLF≠≡CRLFX≠≠.ASCIZ≡≡RUGMES≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≠.MACRO≡≤HALERR≠≠.IFNZ≡≡FLOAT≡≠.STITL≡≠.MACRO≡≤DIGIT≠≠.MACRO≡≤CKSIGN≠≠.EVEN≡≡RELSCN≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠MOV≡≡R4≡≡SP≡≠CLR≡≡R2≡≠MOV≡≡R3≡≠MOV≡≡R1≡≠LDFPS≡≡STAT≡≠CLRF≡≡AC0≡≠CLR≡≡MSIGN≡≡PICK≠≠MOVB≡≡R0≡≡R4≡≠TST≡≡R1≡≠BEQ≡≡CHKDG≡≤CKSIGN≡≠CMP≡≡R4≡≠BEQ≡≡PICK≡≠CMP≡≡R4≡≠BNE≡≡CHKDG≡≠INC≡≡MSIGN≡≠JMP≡≡PICK≡≡CHKDG≠≤DIGIT≡≠CMP≡≡R4≡≠BLT≡≡CHKDP≡≠CMP≡≡R4≡≠BGT≡≡CHKDP≡≠BIC≡≡R4≡≠MULF≡≡TEN≡≡AC0≡≠ASH≡≡R4≡≠ADDF≡≡DGLST≡≡R4≡≡AC0≡≠CLR≡≡R1≡≠SUB≡≡R2≡≠JMP≡≡PICK≡≡CHKDP≠≠CMP≡≡R4≡≠BNE≡≡RNORM≡≠TST≡≡R3≡≠BEQ≡≡RNORM≡≠CLR≡≡R2≡≠CLR≡≡R3≡≠CLR≡≡R1≡≠JMP≡≡PICK≡≡RNORM≠≠TST≡≡R1≡≠BNE≡≡CHKEX≡≠TST≡≡R3≡≠BNE≡≡CHKEX≡≠MULF≡≡TENLST≡≡R2≡≡AC0≡≡CHKEX≠≠CMP≡≡R4≡≠BNE≡≡CHKDN≡≠TST≡≡R1≡≠BEQ≡≡EXCN≡≠LDF≡≡TENLST≡≡AC0≡≠CLR≡≡R1≡≡EXCN≠≠CLR≡≡ESIGN≡≠CLR≡≡R3≡≠MOVB≡≡R0≡≡R4≡≤CKSIGN≡≠CMP≡≡R4≡≠BEQ≡≡PIC2≡≠CMP≡≡R4≡≠BNE≡≡DIG2≡≠INC≡≡ESIGN≡≠JMP≡≡PIC2≡≡PIC2≠≠MOVB≡≡R0≡≡R4≡≡DIG2≠≤DIGIT≡≠CMP≡≡R4≡≠BLT≡≡NORM≡≠CMP≡≡R4≡≠BGT≡≡NORM≡≠BIC≡≡R4≡≠MUL≡≡R3≡≠ADD≡≡R4≡≡R3≡≠JMP≡≡PIC2≡≡NORM≠≠TST≡≡ESIGN≡≠BEQ≡≠NEG≡≡R3≡≠ASH≡≡R3≡≠MULF≡≡TENLST≡≡R3≡≡AC0≡≠JMP≡≡CDONE≡≡CHKDN≠≠TST≡≡R4≡≠BEQ≡≡CDONE≡≠TST≡≡R1≡≠BLT≡≡PICK≡≡CDONE≠≠MOV≡≡SP≡≡R4≡≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠DEC≡≡R0≡≠TST≡≡MSIGN≡≠BEQ≡≠NEGF≡≡AC0≡≠RTS≡≡PC≡≡FORMAT≠≠MOV≡≡WIDTH≡≡OLDW≡≠MOV≡≡DIG≡≡OLDD≡≠SUB≡≡R0≡≠MOV≡≡R0≡≡WIDTH≡≠MOV≡≡R1≡≡DIG≡≠CMP≡≡R0≡≡R1≡≠BGE≡≡NFER≡≤OUTSTR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡FERM≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠MOV≡≡R1≡≡WIDTH≡≡NFER≠≠RTS≡≡PC≡≡FERM≠≠.ASCIZ≡≠.EVEN≡≡RSTFOR≠≠MOV≡≡OLDW≡≡WIDTH≡≠MOV≡≡OLDD≡≡DIG≡≠RTS≡≡PC≡≡CVF≠≠LDFPS≡≡STAT≡≠MOV≡≡WIDTH≡≡R1≡≠SUB≡≡DIG≡≡R1≡≠MOV≡≡R1≡≡PT≡≠ASH≡≡R1≡≠NEG≡≡R1≡≠MULF≡≡TENLST≡≡R1≡≡AC0≡≠MOV≡≡WIDTH≡≡R1≡≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠JSR≡≡PC≡≡PRTF≡≠MOVB≡≡R0≡≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡PC≡≡CVE≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠LDFPS≡≡STAT≡≠CLR≡≡EXPON≡≠MOV≡≡PT≡≠MOV≡≡WIDTH≡≡R1≡≠SUB≡≡R1≡≠TSTF≡≡AC0≡≠CFCC≡≠CFCC≡≠BEQ≡≡EPRT≡≠STF≡≡AC0≡≡NUM≡≠DEC≡≡EXPON≡≠MOV≡≡NUM≡≡R2≡≠BIC≡≡R2≡≠SUB≡≡R2≡≠BGE≡≠CLR≡≡R2≡≠MUL≡≡R2≡≠CMP≡≡R2≡≠BLE≡≠MOV≡≡R2≡≠SUB≡≡R2≡≠ADD≡≡R2≡≡EXPON≡≠ASH≡≡R2≡≠NEG≡≡R2≡≠MULF≡≡TENLST≡≡R2≡≡AC0≡≠STF≡≡AC0≡≡AC1≡≠ABSF≡≡AC1≡≠CMPF≡≡TENLST≡≡AC1≡≠CFCC≡≠CFCC≡≠BGT≡≡EPRT≡≠MULF≡≡TENTH≡≡AC0≡≠INC≡≡EXPON≡≡EPRT≠≠JSR≡≡PC≡≡PRTF≡≠MOVB≡≡R0≡≠MOVB≡≡R0≡≠MOV≡≡EXPON≡≡R3≡≠BGE≡≡XPRT≡≠MOVB≡≡R0≡≠NEG≡≡R3≡≡XPRT≠≠CLR≡≡R2≡≠DIV≡≡R2≡≠BIS≡≡R2≡≠MOVB≡≡R2≡≡R0≡≠BIS≡≡R3≡≠MOVB≡≡R3≡≡R0≡≠MOVB≡≡R0≡≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡PC≡≡CVG≠≠LDFPS≡≡STAT≡≠LDF≡≡AC0≡≡AC1≡≠CFCC≡≠CFCC≡≠ABSF≡≡AC1≡≠BEQ≡≡RUNF≡≠MOV≡≡DIG≡≡R1≡≠ASH≡≡R1≡≠MULF≡≡TENLST≡≡R1≡≡AC1≡≠CMPF≡≡TENLST≡≡AC1≡≠CFCC≡≠CFCC≡≠BGT≡≡RUNE≡≠MOV≡≡WIDTH≡≡R1≡≠ASH≡≡R1≡≠NEG≡≡R1≡≠MULF≡≡TENLST≡≡R1≡≡AC1≡≠CMPF≡≡TENLST≡≡AC1≡≠CFCC≡≠CFCC≡≠BGE≡≡RUNF≡≡RUNE≠≠JSR≡≡PC≡≡CVE≡≠RTS≡≡PC≡≡RUNF≠≠JSR≡≡PC≡≡CVF≡≠RTS≡≡PC≡≡PRTF≠≠TSTF≡≡AC0≡≠MOVB≡≡MSIGN≡≠CFCC≡≠CFCC≡≠ABSF≡≡AC0≡≠BGE≡≠MOVB≡≡MSIGN≡≠MODF≡≡TEN≡≡AC0≡≠CLR≡≡R3≡≡DIGLP≠≠TST≡≡PT≡≠BNE≡≡GETDG≡≠TST≡≡R3≡≠BNE≡≡WTDP≡≠MOVB≡≡MSIGN≡≡R0≡≠INC≡≡R3≡≡WTDP≠≠MOVB≡≡R0≡≡GETDG≠≠STCFI≡≡AC1≡≡R2≡≠CFCC≡≠CFCC≡≠BCC≡≡CHKSZ≡≡TOLGE≠≠ADDF≡≡AC1≡≡AC0≡≠MODF≡≡TENTH≡≡AC0≡≠INC≡≡R1≡≠INC≡≡PT≡≠TST≡≡R3≡≠BEQ≡≡GETDG≡≠CLR≡≡R3≡≠SUB≡≡R0≡≠JMP≡≡GETDG≡≡CHKSZ≠≠TST≡≡R2≡≠BLT≡≡TOLGE≡≠CMP≡≡R2≡≠BGT≡≡TOLGE≡≠MODF≡≡TEN≡≡AC0≡≠TST≡≡R3≡≠BNE≡≡SETBS≡≠TST≡≡R2≡≠BEQ≡≡WTSP≡≠MOVB≡≡MSIGN≡≡R0≡≠INC≡≡R3≡≡SETBS≠≠BIS≡≡R2≡≠JMP≡≡WTCH≡≡WTSP≠≠MOVB≡≡R2≡≡WTCH≠≠MOVB≡≡R2≡≡R0≡≠DEC≡≡PT≡≠SOB≡≡R1≡≡DIGLP≡≠RTS≡≡PC≡≡INSTR≠≠CLR≡≡CCNT≡≡IN2≠≠TSTB≡≡KBIS≡≠BEQ≡≠MOVB≡≡KBIR≡≡R1≡≠BIC≡≡R1≡≠CMP≡≡R1≡≠BNE≡≡IN3≡≠TST≡≡CCNT≡≠BEQ≡≡IN2≡≠DEC≡≡R0≡≠DEC≡≡CCNT≡≤OUTSTR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡DBS≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡IN2≡≡IN3≠≠CMP≡≡R1≡≠BEQ≡≡IN4≡≠CMP≡≡R1≡≠BLT≡≡IN2≡≠MOVB≡≡R1≡≡R0≡≠INC≡≡CCNT≡≠TSTB≡≡KBOS≡≠BPL≡≠MOVB≡≡R1≡≡KBOR≡≠JMP≡≡IN2≡≡IN4≠≤CRLF≡≤OUTSTR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠MOVB≡≡R1≡≡R0≡≠MOVB≡≡R0≡≠RTS≡≡PC≡≡CCNT≠≡DBS≠≠.BYTE≡≡STAT≠≡MSIGN≠≡ESIGN≠≡EXPON≠≡NUM≠≠.WORD≡≡WIDTH≠≡DIG≠≡OLDW≠≡OLDD≠≡PT≠≡DGLST≠≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≡TENTH≠≠.WORD≡≡TENLST≠≠.WORD≡≡TEN≠≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≠.WORD≡≡INBUF≠≠.BLKW≡≡OUTBUF≠≠.BLKW≡≠.INSRT≡≠COMMEN≡≠.SBTTL≡≡FREL≠≠.EVEN≡≡FREEPT≠≡FREEST≡≡FREEST≡≡FREEST≠≡FREL≡≡FREL≡≠.BLKW≡≡FREL≡≡FREEND≠≡FREL≡≡FREL≡≡FRINIT≠≠MOV≡≡FREL≡≡FREEST≡≠MOV≡≡FREL≡≡FREEND≡≠MOV≡≡FREEST≡≡FREEPT≡≠CMP≡≡FREEST≡≡FREEND≡≠BNE≡≡FRINER≡≠RTS≡≡PC≡≡FRINER≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡FRINMS≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡FRINMS≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≡GTFREE≠≠MOV≡≡R2≡≡SP≡≠ASL≡≡R0≡≠BLT≡≡FREERR≡≠ADD≡≡R0≡≠MOV≡≡FREEPT≡≡R1≡≡FRTRY≠≠CMP≡≡R1≡≡FREEND≡≠BLOS≡≡FR2≡≠MOV≡≡FREEST≡≡R1≡≡FR2≠≠CMP≡≡R1≡≡R0≡≠BGE≡≡FFOUND≡≠TST≡≡R1≡≠BGE≡≡FRPOS≡≠SUB≡≡R1≡≡R1≡≠BR≡≡FR1≡≡FRPOS≠≠ADD≡≡R1≡≡R1≡≡FR1≠≠CMP≡≡R1≡≡FREEPT≡≠BEQ≡≡FROVFL≡≠BR≡≡FRTRY≡≡FFOUND≠≠BEQ≡≡FEXACT≡≠MOV≡≡R1≡≡R2≡≠ADD≡≡R0≡≡R2≡≠NEG≡≡R0≡≠MOV≡≡R0≡≡R2≡≠MOV≡≡R0≡≡SP≡≠ADD≡≡R1≡≡R0≡≠MOV≡≡R0≡≡R2≡≠MOV≡≡R2≡≡FREEPT≡≠MOV≡≡R1≡≡R2≡≠TST≡≡R2≡≠ADD≡≡R1≡≡R2≡≠MOV≡≡R0≡≡R2≡≠MOV≡≡SP≡≡R1≡≡FRRET≠≠MOV≡≡R1≡≡R0≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡PC≡≡FEXACT≠≠MOV≡≡R1≡≡R2≡≠ADD≡≡R1≡≡R2≡≠NEG≡≡R1≡≠NEG≡≡R2≡≠BR≡≡FRRET≡≡FREERR≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡FRMS1≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡FROVFL≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡FRMS2≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡FRMS1≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≡FRMS2≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≡RLFREE≠≠MOV≡≡R0≡≡R1≡≠BGE≡≡RLFER2≡≠MOV≡≡R0≡≡R1≡≠SUB≡≡R0≡≡R0≡≠CMP≡≡R1≡≡R0≡≠BNE≡≡RLFER1≡≠NEG≡≡R1≡≠TST≡≡R1≡≠BLT≡≡MERGR≡≠ADD≡≡R1≡≡R1≡≠MOV≡≡R1≡≡R0≡≠MOV≡≡R0≡≡R1≡≠SUB≡≡R1≡≡R1≡≠MOV≡≡R0≡≡R1≡≡MERGR≠≠TST≡≡R0≡≠BLT≡≡RLRET≡≠ADD≡≡R0≡≡R1≡≠CMP≡≡FREEPT≡≡R0≡≠BNE≡≡RL1≡≠MOV≡≡R1≡≡FREEPT≡≡RL1≠≠ADD≡≡R0≡≡R0≡≡RLRET≠≠MOV≡≡R1≡≡R0≡≠RTS≡≡PC≡≡RLFER1≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RLMS1≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡RLFER2≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RLMS2≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡RLMS1≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≡RLMS2≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≠.INSRT≡≠COMMEN≡≠.SBTTL≡≡SMBDBG≠≠.LIST≡	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 6
	SMALLB PAL[HAL,HE]	PAGE 3 	SMALL BLOCK ALLOCATOR

≥					
≡MMETHS≠≥	014534	000000			MMETHS:	0			;OWNS A LIST OF MARKING METHODS
≡GCOK≠≥	014536	000000			GCOK:	0			;SET IF GC IS OK NOW
≡CPFYOK≠≥	014540	000000			CPFYOK:	0			;SET IF COMPACTIFICATION IS OK
≡SIDLST≠≥					SIDLST:				;LIST OF SPACE ID BLOCKS
≠.IF1≡≥						.IF1			;ALL THIS HAIR IS FOR COMPILE-TIME LINKAGE
≥							0
≥						.ENDC
≠.IF2≡≥						.IF2
≡SIDHED≡≡SIDHED≡≥	014542	017276					SIDHED
≥						.ENDC
≡SIDTBL≠≥	014544	000000			SIDTBL:	0			;SINCE INDICES START AT 1
≠.BLKW≡≡MAXIDF≡≥		014626				.BLKW MAXIDF
≥					
≠.XLIST≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡ROUT≠≡NNNN≡≡NNNN≠≡MAPPTR≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡MMETHS≡≡R2≡≠BEQ≡≡MAPRTS≡≡MAPLP≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡ROUT≡≡RF≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡METH≡≡R2≡≠MOV≡≡NXTMTH≡≡R2≡≡R2≡≠BNE≡≡MAPLP≡≡MAPRTS≠≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≡MKRTJM≠≠JMP≡≡ROUT≡≡RF≡≡MARKR0≠≠TST≡≡R0≡≠BEQ≡≡MR0.X≡≠JSR≡≡PC≡≡PTRSID≡≠JSR≡≡PC≡≡MAPRTN≡≡R1≡≡MR0.X≠≠RTS≡≡PC≡≡LNKMTH≠≠MOV≡≡MMETHS≡≡NXTMTH≡≡R0≡≠MOV≡≡R0≡≡MMETHS≡≠RTS≡≡PC≡≤ROUTIN≡≠.IFNB≡≡MARKPH≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠MOV≡≡SIDLST≡≡R2≡≠BEQ≡≡MKPHRT≡≡MKPH.1≠≠TST≡≡GCFG≡≡R2≡≠BEQ≡≡MKPH.A≡≠MOV≡≡SIZE≡≡R2≡≡R3≡≠INC≡≡R3≡≠ASL≡≡R3≡≠MOV≡≡FSTBUF≡≡R2≡≡R1≡≡MKP.02≠≠MOV≡≡FSTBLK≡≡R1≡≡R0≡≡MKPH.2≠≠CMP≡≡R0≡≡LSTBLK≡≡R1≡≠BGT≡≡MKPH.3≡≠CLRB≡≡TAG≡≡R0≡≠ADD≡≡R3≡≡R0≡≠BR≡≡MKPH.2≡≡MKPH.3≠≠MOV≡≡NXTBUF≡≡R1≡≡R1≡≠BNE≡≡MKP.02≡≡MKPH.A≠≠MOV≡≡NXTSID≡≡R2≡≡R2≡≠BNE≡≡MKPH.1≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡MKROUT≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡MAPPTR≡≡MKPHRT≠≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≡MKROUT≠≠MOVB≡≡TAG≡≡R0≡≠RTS≡≡PC≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡SPC≠≡NNNN≡≡NNNN≠≡CPFYSP≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠MOV≡≡R4≡≡SP≡≠MOV≡≡SPC≡≡RF≡≡R2≡≠MOV≡≡FSTBUF≡≡R2≡≡R3≡≠MOV≡≡LSTBUF≡≡R2≡≡R4≡≠JSR≡≡PC≡≡NXF.0≡≠BEQ≡≡CPFY.2≡≠JSR≡≡PC≡≡NXR.0≡≠BEQ≡≡CPFY.2≡≡CPFY.1≠≠MOV≡≡R1≡≡SP≡≠MOV≡≡R0≡≡SP≡≠MOVB≡≡TAG≡≡R0≡≠CLRB≡≡TAG≡≡R1≡≠MOV≡≡SIZE≡≡R2≡≡R2≡≡CPYR≠≠MOV≡≡R1≡≡R0≡≠DEC≡≡R2≡≠BGT≡≡CPYR≡≠MOV≡≡SPC≡≡RF≡≡R2≡≠MOV≡≡SP≡≡R0≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡R0≡≡WORD0≡≡R1≡≠JSR≡≡PC≡≡NXF.NX≡≠BEQ≡≡CPFY.2≡≠JSR≡≡PC≡≡NXR.NX≡≠BNE≡≡CPFY.1≡≡CPFY.2≠≠MOV≡≡SP≡≡R4≡≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≡NXF.0≠≠MOV≡≡FSTBLK≡≡R3≡≡R0≡≡NXF.1≠≠TSTB≡≡TAG≡≡R0≡≠BEQ≡≡NXF.4≡≡NXF.NX≠≠ADD≡≡SIZE≡≡R2≡≡R0≡≠ADD≡≡SIZE≡≡R2≡≡R0≡≠TST≡≡R0≡≠CMP≡≡R0≡≡LSTBLK≡≡R3≡≠BLE≡≡NXF.1≡≠MOV≡≡NXTBUF≡≡R3≡≡R3≡≠BEQ≡≡NXF.3≡≠CMP≡≡R3≡≡R4≡≠BNE≡≡NXF.0≡≡NXF.3≠≠CLR≡≡R0≡≡NXF.4≠≠MOV≡≡R0≡≡R0≡≠RTS≡≡PC≡≡NXR.0≠≠MOV≡≡FSTBLK≡≡R4≡≡R0≡≡NXR.1≠≠TSTB≡≡TAG≡≡R0≡≠BNE≡≡NXF.4≡≡NXR.NX≠≠ADD≡≡SIZE≡≡R2≡≡R0≡≠ADD≡≡SIZE≡≡R2≡≡R0≡≠TST≡≡R0≡≠CMP≡≡R0≡≡LSTBLK≡≡R4≡≠BLE≡≡NXR.1≡≠MOV≡≡PRVBUF≡≡R4≡≡R4≡≠BEQ≡≡NXR.3≡≠CMP≡≡R3≡≡R4≡≠BNE≡≡NXF.0≡≡NXR.3≠≠CLR≡≡R0≡≡NXR.4≠≠MOV≡≡R0≡≡R0≡≠RTS≡≡PC≡≤ROUTIN≡≠.IFNB≡≡CPFY≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡SIDLST≡≡R2≡≠BEQ≡≡CPFYXX≡≡CPFYLP≠≠TST≡≡GCFG≡≡R2≡≠BEQ≡≡CPFYNX≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡R2≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡CPFYSP≡≡CPFYNX≠≠MOV≡≡NXTSID≡≡R2≡≡R2≡≠BNE≡≡CPFYLP≡≡CPFYXX≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡MUNLNK≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡MAPPTR≡≡CPFYRT≠≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≡MUNLNK≠≠MOV≡≡R0≡≡R1≡≠TST≡≡TAG≡≡R1≡≠BNE≡≡MUNRTS≡≠MOV≡≡WORD0≡≡R1≡≡R0≡≡MUNRTS≠≠RTS≡≡PC≡≤ROUTIN≡≠.IFNB≡≡SWEEP≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡SIDLST≡≡R2≡≠BEQ≡≡SWP.X≡≡SWP.LP≠≠JSR≡≡PC≡≡SWP.≡≠MOV≡≡NXTSID≡≡R2≡≡R2≡≠BNE≡≡SWP.LP≡≡SWP.X≠≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡SPCC≠≡NNNN≡≡NNNN≠≡SWEEP1≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡SPCC≡≡RF≡≡R2≡≠JSR≡≡PC≡≡SWP.≡≡SWP.XX≠≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≡SWP.≠≠TST≡≡GCFG≡≡R2≡≠BNE≡≡SWP.00≡≠RTS≡≡PC≡≡SWP.00≠≠MOV≡≡R3≡≡SP≡≠MOV≡≡R4≡≡SP≡≠CLR≡≡FFREE≡≡R2≡≠CLR≡≡NFREE≡≡R2≡≠CLR≡≡NALLOC≡≡R2≡≠MOV≡≡FSTBUF≡≡R2≡≡R3≡≠BEQ≡≡SWP.3≡≠MOV≡≡SIZE≡≡R2≡≡R4≡≠INC≡≡R4≡≠ASL≡≡R4≡≡SWP.01≠≠MOV≡≡FSTBLK≡≡R3≡≡R0≡≡SWP.1≠≠TSTB≡≡TAG≡≡R0≡≠BEQ≡≡SWP.1N≡≠INC≡≡NALLOC≡≡R2≡≠BR≡≡SWP.2≡≡SWP.1N≠≠INC≡≡NFREE≡≡R2≡≠MOV≡≡FFREE≡≡R2≡≡WORD0≡≡R0≡≠MOV≡≡R0≡≡FFREE≡≡R2≡≡SWP.2≠≠ADD≡≡R4≡≡R0≡≠CMP≡≡R0≡≡LSTBLK≡≡R3≡≠BLE≡≡SWP.1≡≠MOV≡≡NXTBUF≡≡R3≡≡R3≡≠BNE≡≡SWP.01≡≡SWP.3≠≠CMP≡≡NFREE≡≡R2≡≡NMIN≡≡R2≡≠BGT≡≡SWP.5≡≡SWP.4≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡R2≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡ADDBUF≡≠BR≡≡SWP.3≡≡SWP.5≠≠MOV≡≡NFREE≡≡R2≡≡R0≡≠ADD≡≡NALLOC≡≡R2≡≡R0≡≠MUL≡≡NPCT≡≡R2≡≡R0≡≠DIV≡≡R0≡≠CMP≡≡NFREE≡≡R2≡≡R0≡≠BGT≡≡SWP.6≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡R2≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡ADDBUF≡≠BR≡≡SWP.5≡≡SWP.6≠≠MOV≡≡SP≡≡R4≡≠MOV≡≡SP≡≡R3≡≠RTS≡≡PC≡≤ROUTIN≡≠.IFNB≡≡GC≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡MARKPH≡≠TST≡≡CPFYOK≡≠BEQ≡≡SWPPIT≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡CPFY≡≡SWPPIT≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡SWEEP≡≠RTS≡≡RF≡≡GETSBK≠≠MOV≡≡R0≡≡R1≡≡GETBL1≠≠TST≡≡R1≡≠BEQ≡≡GETBER≡≠MOV≡≡FFREE≡≡R1≡≡R0≡≠BNE≡≡GETBLX≡≠MOV≡≡R1≡≡SP≡≠TST≡≡GCFG≡≡R1≡≠BEQ≡≡GETADB≡≠TST≡≡GCOK≡≠BNE≡≡GETGC≡≡GETADB≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡R1≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡ADDBUF≡≠BR≡≡GETBXX≡≡GETGC≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡GC≡≡GETBXX≠≠MOV≡≡SP≡≡R1≡≠BR≡≡GETBL1≡≡GETBLX≠≠MOV≡≡WORD0≡≡R0≡≡FFREE≡≡R1≡≠INC≡≡NALLOC≡≡R1≡≠DEC≡≡NFREE≡≡R1≡≠MOVB≡≡IDFLAG≡≡R1≡≡TAGID≡≡R0≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡SIZE≡≡R1≡≡R1≡≡GETB.C≠≠CLR≡≡R0≡≠DEC≡≡R1≡≠BGT≡≡GETB.C≡≠MOV≡≡SP≡≡R0≡≠RTS≡≡PC≡≡GETBLK≠≠JSR≡≡PC≡≡GETSID≡≠BR≡≡GETBL1≡≡GETBER≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡GERMSG≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≠CLR≡≡R0≡≠RTS≡≡PC≡≡GERMSG≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≡GETSID≠≠MOV≡≡R0≡≡R1≡≠CMP≡≡R0≡≡MAXIDF≡≠BGT≡≡GETS.1≡≠ASL≡≡R1≡≠MOV≡≡SIDTBL≡≡R1≡≡R1≡≡GETS.X≠≠RTS≡≡PC≡≡GETS.1≠≠MOV≡≡SIDLST≡≡R1≡≠BEQ≡≡GETS.X≡≡GETS.2≠≠CMP≡≡R0≡≡IDFLAG≡≡R1≡≠BNE≡≡GETS.X≡≠MOV≡≡NXTSID≡≡R1≡≡R1≡≠BNE≡≡GETS.2≡≠RTS≡≡PC≡≡PTRSID≠≠MOV≡≡R0≡≡SP≡≠MOVB≡≡TAGID≡≡R0≡≡R0≡≠JSR≡≡PC≡≡GETSID≡≠MOV≡≡SP≡≡R0≡≠RTS≡≡PC≡≡FREBLK≠≠MOV≡≡SIDLST≡≡R1≡≠BEQ≡≡FREBER≡≡FREB.1≠≠CMPB≡≡TAGID≡≡R0≡≡IDFLAG≡≡R1≡≠BNE≡≡FREB.2≡≡FREB.≠≠MOV≡≡FFREE≡≡R1≡≡WORD0≡≡R0≡≠MOV≡≡R0≡≡FFREE≡≡R1≡≠INC≡≡NFREE≡≡R1≡≠DEC≡≡NALLOC≡≡R1≡≠CLRB≡≡TAG≡≡R0≡≠RTS≡≡PC≡≡FREB.2≠≠MOV≡≡NXTSID≡≡R1≡≡R1≡≠BNE≡≡FREB.1≡≡FREBER≠≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡FRERMS≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡FRERMS≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≠RTS≡≡PC≡≡FRESBK≠≠CMPB≡≡TAGID≡≡R0≡≡IDFLAG≡≡R1≡≠BEQ≡≡FREB.≡≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡FRBER2≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≠BR≡≡FREB.≡≡FRBER2≠≤ASCIE≡≠.ASCIZ≡≠.EVEN≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≡NNNN≡≡NNNN≠≡NNNN≡≡NNNN≠≡NNNN≡≡NNNN≠≡NNNN≡≡NNNN≠≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡SZ≠≡NNNN≡≡NNNN≠≡NNNN≡≡IDF≠≡NNNN≡≡NNNN≠≡NNNN≡≡NPB≠≡NNNN≡≡NNNN≠≡NNNN≡≡GCF≠≡NNNN≡≡NNNN≠≡NNNN≡≡NMN≠≡NNNN≡≡NNNN≠≡NNNN≡≡NPC≠≡NNNN≡≡NNNN≠≡NEWSPC≠≠MOV≡≡SPCHDR≡≡R0≡≠JSR≡≡PC≡≡GTFREE≡≠MOV≡≡SZ≡≡RF≡≡SIZE≡≡R0≡≠MOV≡≡NPB≡≡RF≡≡NPERB≡≡R0≡≠MOV≡≡IDF≡≡RF≡≡IDFLAG≡≡R0≡≠MOV≡≡NMN≡≡RF≡≡NMIN≡≡R0≡≠MOV≡≡NPC≡≡RF≡≡NPCT≡≡R0≡≡NEWS.1≠≠MOV≡≡SIDLST≡≡NXTSID≡≡R0≡≠MOV≡≡R0≡≡SIDLST≡≠MOV≡≡IDFLAG≡≡R0≡≡R1≡≠CMP≡≡R1≡≡MAXIDF≡≠BGT≡≡NEWS.2≡≠ASL≡≡R1≡≠MOV≡≡R0≡≡SIDTBL≡≡R1≡≡NEWS.2≠≠CLR≡≡FSTBUF≡≡R0≡≠CLR≡≡LSTBUF≡≡R0≡≠CLR≡≡NALLOC≡≡R0≡≠CLR≡≡NFREE≡≡R0≡≠RTS≡≡RF≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡SPCADR≠≡NNNN≡≡NNNN≠≡SETSPC≠≠MOV≡≡SPCADR≡≡RF≡≡R0≡≠BR≡≡NEWS.1≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡SPACE≠≡NNNN≡≡NNNN≠≡ADDBUF≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡R3≡≡SP≡≠MOV≡≡SPACE≡≡RF≡≡R2≡≠MOV≡≡SIZE≡≡R2≡≡R1≡≠INC≡≡R1≡≠MOV≡≡R1≡≡SP≡≠MUL≡≡NPERB≡≡R2≡≡R1≡≠ADD≡≡BUFHDR≡≡R1≡≠MOV≡≡R1≡≡R0≡≠JSR≡≡PC≡≡GTFREE≡≠MOV≡≡LSTBUF≡≡R2≡≡R1≡≠MOV≡≡R1≡≡PRVBUF≡≡R0≡≠BEQ≡≡ADB.01≡≠MOV≡≡R0≡≡NXTBUF≡≡R1≡≠BR≡≡ADB.1≡≡ADB.01≠≠MOV≡≡R0≡≡FSTBUF≡≡R2≡≡ADB.1≠≠CLR≡≡NXTBUF≡≡R0≡≠MOV≡≡R0≡≡LSTBUF≡≡R2≡≠MOV≡≡R0≡≡R3≡≠ADD≡≡BUFHDR≡≡R3≡≠MOV≡≡R3≡≡FSTBLK≡≡R0≡≠MOV≡≡NPERB≡≡R2≡≡R1≡≠ASL≡≡SP≡≠SUB≡≡SP≡≡R3≡≡ADB.2≠≠ADD≡≡SP≡≡R3≡≠INC≡≡NFREE≡≡R2≡≠CLRB≡≡TAG≡≡R3≡≠MOVB≡≡IDFLAG≡≡R2≡≡TAGID≡≡R3≡≠MOV≡≡FFREE≡≡R2≡≡WORD0≡≡R3≡≠MOV≡≡R3≡≡FFREE≡≡R2≡≠DEC≡≡R1≡≠BGT≡≡ADB.2≡≠MOV≡≡R3≡≡LSTBLK≡≡R0≡≠TST≡≡SP≡≠MOV≡≡SP≡≡R3≡≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≤ROUTIN≡≠.IFNB≡≡FSINI≠≠CLR≡≡SIDLST≡≠CLR≡≡GCOK≡≠CLR≡≡CPFYOK≡≠CLR≡≡MMETHS≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠.IRP≡≠MOV≡≡VCTSPC≡≡SP≡≡NNNN≡≡NNNN≠≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡SETSPC≡≠RTS≡≡RF≡≠.LIST≡	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 7
	SMALLB PAL[HAL,HE]	PAGE 14 	SMALL BLOCK ALLOCATOR

≥					
≠.IFNZ≡≡SMBDBG≡≥		000001			.IFNZ	SMBDBG
≡VCTSPC≠≤DEFSPC≡≥					VCTSPC:	DEFSPC	VCTID,MKRTJM,4,10,1,4,15
≠.IFNDF≡≡VCTID≡≥					    .IFNDF VCTID
≥						SIDCNT==SIDCNT+1
≥						VCTID==SIDCNT
≥					    .ENDC
≡II≠≥		017276			    II==.
≠.BLKW≡≡SPCHDR≡≥		017330			    .BLKW SPCHDR/2
≤TT≡≥						TT	IDFLAG,VCTID
≡II≡≡IDFLAG≡≥		017276				.=II+IDFLAG
≡VCTID≡≡VCTID≡≥	017276	000001				VCTID
≤TT≡≥						TT	MAPRTN,MKRTJM
≡II≡≡MAPRTN≡≥		017300				.=II+MAPRTN
≡MKRTJM≡≡MKRTJM≡≥	017300	014670				MKRTJM
≤TT≡≥						TT	SIZE,4
≡II≡≡SIZE≡≥		017302				.=II+SIZE
≥	017302	000004				4
≤TT≡≥						TT	NPERB,10
≡II≡≡NPERB≡≥		017304				.=II+NPERB
≥	017304	000010				10
≤TT≡≥						TT	GCFG,1
≡II≡≡GCFG≡≥		017306				.=II+GCFG
≥	017306	000001				1
≤TT≡≥						TT	NMIN,4
≡II≡≡NMIN≡≥		017310				.=II+NMIN
≥	017310	000004				4
≤TT≡≥						TT	NPCT,15
≡II≡≡NPCT≡≥		017312				.=II+NPCT
≥	017312	000015				15
≤TT≡≥						TT	NXTSID,SIDCHN
≡II≡≡NXTSID≡≥		017314				.=II+NXTSID
≡SIDCHN≡≡SIDCHN≡≥	017314	000000				SIDCHN
≤TT≡≥						TT	FFREE,0
≡II≡≡FFREE≡≥		017316				.=II+FFREE
≥	017316	000000				0
≤TT≡≥						TT	FSTBUF,0
≡II≡≡FSTBUF≡≥		017320				.=II+FSTBUF
≥	017320	000000				0
≤TT≡≥						TT	LSTBUF,0
≡II≡≡LSTBUF≡≥		017322				.=II+LSTBUF
≥	017322	000000				0
≤TT≡≥						TT	NALLOC,0
≡II≡≡NALLOC≡≥		017324				.=II+NALLOC
≥	017324	000000				0
≤TT≡≥						TT	NFREE,0
≡II≡≡NFREE≡≥		017326				.=II+NFREE
≥	017326	000000				0
≡II≡≡SPCHDR≡≥		017330			    .=II+SPCHDR
≡II≡≡SIDCHN≠	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 8
	SMALLB PAL[HAL,HE]	PAGE 14.1 	SMALL BLOCK ALLOCATOR

≥		017276			    SIDCHN == II
≠.IF2≡≥					    .IF2
≠.IFGE≡≡MAXIDF≡≡VCTID≡≥		000027				.IFGE MAXIDF-VCTID
≡II≠≥		017330				    II==.
≡SIDTBL≡≡VCTID≡≥		014546				    .=SIDTBL+<VCTID*2>
≡SIDCHN≡≡SIDCHN≡≥	014546	017276				    SIDCHN
≡II≡≥		017330				    .=II
≥						.ENDC
≥					    .ENDC
≠.XLIST≡≡FSTEST≠≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡FSINI≡≠MOV≡≡R2≡≠MOV≡≡VCTARA≡≡R3≡≡FST.1≠≠MOV≡≡VCTID≡≡R0≡≠JSR≡≡PC≡≡GETBLK≡≡FST.2≠≠MOV≡≡R0≡≡R3≡≠DEC≡≡R2≡≠BGT≡≡FST.1≡≡FST.3≠≠MOV≡≡R2≡≡FST.4≠≠MOV≡≡R3≡≡R0≡≠JSR≡≡PC≡≡FREBLK≡≠DEC≡≡R2≡≠BGT≡≡FST.4≡≡FST.5≠≠MOV≡≡R2≡≡FST.6≠≠MOV≡≡VCTID≡≡R0≡≠JSR≡≡PC≡≡GETBLK≡≠MOV≡≡R0≡≡R3≡≠DEC≡≡R2≡≠BGT≡≡FST.6≡≡FST.10≠≠MOV≡≡TSTMTH≡≡R0≡≠JSR≡≡PC≡≡LNKMTH≡≠MOV≡≡R3≡≡VCTUB≡≠SUB≡≡VCTUB≡≠MOV≡≡VCTARA≡≡VCTLB≡≠MOV≡≡GCOK≡≤CALL≡≠MOV≡≡RF≡≡SP≡≡NNNN≠≠.IFNB≡≠MOV≡≡NNNN≡≡SP≡≠MOV≡≡SP≡≡RF≡≠JSR≡≡PC≡≡GC≡≡FST.11≠≠MOV≡≡R2≡≡FST.12≠≠MOV≡≡VCTSPC≡≡R0≡≠JSR≡≡PC≡≡GETSBK≡≠DEC≡≡R2≡≠BGT≡≡FST.12≡≤HALERR≡≠MOV≡≡R0≡≡SP≡≠MOV≡≡R1≡≡SP≡≠MOV≡≡CRLFX≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡DNMSG≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡RUGMES≡≡R0≡≠JSR≡≡PC≡≡TYPSTR≡≠MOV≡≡SP≡≡R1≡≠MOV≡≡SP≡≡R0≡≠JMP≡≡RUG≡≠BR≡≡DNMSG≠≤ASCIE≡≠.ASCIZ≡≡VCTARA≠≠.BLKW≡≡VCTUB≠≡VCTLB≠≡TSTMTH≠≤MMETH≡≡TSTRTN≡≡TSTRTN≡≤ROUTIN≡≠.IFNB≡≡NNNN≠≠.IRP≡≡NNNN≡≡NNNN≠≠.IRP≡≡NNNN≡≡RTN≠≡NNNN≡≡NNNN≠≡TSTRTN≠≠MOV≡≡R2≡≡SP≡≠MOV≡≡VCTLB≡≡R2≡≡TST.R1≠≠CMP≡≡R2≡≡VCTUB≡≠BGT≡≡TSTRTS≡≠MOV≡≡R2≡≡R0≡≠JSR≡≡PC≡≡MARKR0≡≠MOV≡≡R0≡≡R2≡≠BR≡≡TST.R1≡≡TSTRTS≠≠MOV≡≡SP≡≡R2≡≠RTS≡≡RF≡≠.LIST≡	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 9
	HAL PAL[HAL,HE]	PAGE 2.1 	SMALL BLOCK ALLOCATOR

≥					
≥					; program initialization
≥					
≠.EVEN≡≥		020300			.EVEN
≡START≠≠RESET≡≠RESET≡≥	020300	000005			START:	RESET
≠MOV≡≡SP≡≥	020302	012706	000500			MOV #500,SP	;initialize stack
≠CLR≡≡PS≡≥	020306	005067	157464			CLR PS		;initialize processor status
≡CLKIN≠≠CLR≡≡CLKCNT≡≥	020312	005067	152226		CLKIN:	CLR CLKCNT	;clear clock registers- trap restart
≠CLR≡≡CLKSET≡≥	020316	005067	152220			CLR CLKSET
≠CLR≡≡CLKS≡≥	020322	005067	152212			CLR CLKS
≤HALERR≡≥						HALERR RUGMES	;Finished here.  Terminate cleanly.
≠MOV≡≡R0≡≡SP≡≥	020326	010046				MOV R0,-(SP)	;Save R0.
≠MOV≡≡R1≡≡SP≡≥	020330	010146				MOV R1,-(SP)	;Save R1.
≠MOV≡≡CRLFX≡≡R0≡≥	020332	012700	000626			MOV #CRLFX,R0	;Move to new line
≠JSR≡≡PC≡≡TYPSTR≡≥	020336	004767	160136			JSR PC,TYPSTR	;
≠MOV≡≡RUGMES≡≡R0≡≥	020342	012700	000631			MOV #RUGMES,R0	;Type out message
≠JSR≡≡PC≡≡TYPSTR≡≥	020346	004767	160126			JSR PC,TYPSTR	;
≠MOV≡≡RUGMES≡≡R0≡≥	020352	012700	000631			MOV #RUGMES,R0	;Type out RUGMES
≠JSR≡≡PC≡≡TYPSTR≡≥	020356	004767	160116			JSR PC,TYPSTR	;
≠MOV≡≡SP≡≡R1≡≥	020362	012601				MOV (SP)+,R1	;Restore R1.
≠MOV≡≡SP≡≡R0≡≥	020364	012600				MOV (SP)+,R0	;Restore R2.
≠JMP≡≡RUG≡≥	020366	000167	027406			JMP RUG		;Go directly to RUG.
≠BR≡≥	020372	000775				BR .-4		;In case we return.
≥					
≡PATCH≠≠.BLKW≡≥		020574			PATCH:	.BLKW	100
≥					
≠.END≡≡START≡≥		020300			.END START
	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 10
	HAL PAL[HAL,HE]	PAGE 2 	***SYMBOL TABLE***      

	AC0	000000RH		ESIGN	002412		GC	015726		MAPRTN	000002H	
	AC1	000001RH		EXCN	001100		GCF	000006H		MAPRTS	014664	
	AC2	000002RH		EXPON	002414		GCFG	000010H		MARK0	006400	
	AC3	000003RH		FERM	001330		GCOK	014536		MARK1	006401	
	AC4	000004RH		FEXACT	013746		GERMSG	016220		MARK2	006402	
	AC5	000005RH		FFOUND	013700		GETADB	016034		MARK3	006403	
	ADB.01	017124		FFREE	000020H		GETB.C	016126		MARK4	006404	
	ADB.1	017130		FLOAT	000001H		GETBER	016146		MARK5	006405	
	ADB.2	017162		FORM	000004H		GETBL1	016004		MARKPH	014726	
	ADDBUF	017046		FORMAT	001246		GETBLK	016140		MARKR0	014674	
	BUFHDR	000010H		FR1	013670		GETBLX	016074		MAXIDF	000030H	
	CCNT	002400		FR2	013652		GETBXX	016070		MERGR	014250	
	CDONE	001224		FRBER2	016662		GETDG	002076		METH	000000H	
	CHGCOD	000002H		FREB.	016406		GETGC	016054		MKP.02	014762	
	CHKDG	000752		FREB.1	016376		GETS.1	016326		MKPH.1	014740	
	CHKDN	001214		FREB.2	016436		GETS.2	016334		MKPH.2	014766	
	CHKDP	001020		FREBER	016444		GETS.X	016324		MKPH.3	015004	
	CHKEX	001060		FREBLK	016370		GETSBK	016002		MKPH.A	015012	
	CHKSZ	002136		FREEND	013442		GETSID	016306		MKPHRT	015040	
	CLKCNT	172544		FREEPT	003440		GNCHGS	000014H		MKROUT	015046	
	CLKIN	020312		FREERR	013760		GNCLCS	000012H		MKRTJM	014670	
	CLKS	172540		FREEST	003444		GNDEPS	000010H		MMETHS	014534	
	CLKSET	172542		FREL	004000		GNVAL	000006H		MR0.X	014710	
	CLKTRP	000104		FRERMS	016512		GTFREE	013622		MSIGN	002410	
	CPFY	015330		FRESBK	016602		HCOR	077776		MUNLNK	015416	
	CPFY.1	015114		FRINER	013502		IBUF	000150		MUNRTS	015432	
	CPFY.2	015174		FRINIT	013446		IDF	000012H		NALLOC	000026H	
	CPFYLP	015340		FRINMS	013550		IDFLAG	000000H		NEEDED	000002H	
	CPFYNX	015364		FRMS1	014074		II	017330H		NEWS.1	016764	
	CPFYOK	014540		FRMS2	014150		ILGINS	000010		NEWS.2	017016	
	CPFYRT	015412		FROVFL	014026		IN2	002224		NEWSPC	016716	
	CPFYSP	015056		FRPOS	013666		IN3	002310		NFER	001326	
	CPFYXX	015372		FRRET	013740		IN4	002350		NFREE	000030H	
	CPYR	015136		FRTRY	013640		INBUF	003170		NMIN	000012H	
	CRLFX	000626		FSINI	017234		INSTR	002220		NMN	000004H	
	CVE	001454		FST.1	017354		INVMRK	000004H		NNNN	000000H	
	CVF	001374		FST.10	017432		KBIR	177562		NORM	001170	
	CVG	001716		FST.11	017504		KBIS	177560		NPB	000010H	
	DATUM	000000H		FST.12	017510		KBOR	177566		NPC	000002H	
	DBS	002402		FST.2	017364		KBOS	177564		NPCT	000014H	
	DGLST	002434		FST.3	017372		LINKB	000004H		NPERB	000006H	
	DIG	002424		FST.4	017376		LINKF	000002H		NUM	002416	
	DIG2	001136		FST.5	017410		LNKMTH	014712		NXF.0	015204	
	DIGLP	002052		FST.6	017414		LSTBLK	000004H		NXF.1	015210	
	DNMSG	017572		FSTBLK	000006H		LSTBUF	000024H		NXF.3	015250	
	EPRT	001630		FSTBUF	000022H		MAPLP	014636		NXF.4	015252	
	ERRTRP	000004		FSTEST	017330		MAPPTR	014626		NXF.NX	015216	
	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 11
	HAL PAL[HAL,HE]	PAGE 2 	***SYMBOL TABLE***      

	NXR.0	015256		RUNF	002012		TSTRTS	020274	
	NXR.1	015262		SETBS	002172		TYPCHR	000566	
	NXR.3	015322		SETSPC	017040		TYPDEC	000516	
	NXR.4	015324		SIDCHN	017276H		TYPDIG	000536	
	NXR.NX	015270		SIDCNT	000000H		TYPOCT	000526	
	NXTBUF	000000H		SIDHED	017276H		TYPOUT	000560	
	NXTCHG	000000H		SIDLST	014542		TYPRET	000624	
	NXTCLC	000000H		SIDTBL	014544		TYPSTR	000500	
	NXTGN	000000H		SIZE	000004H		VCTARA	017636	
	NXTMTH	000002H		SMBDBG	000001H		VCTID	000001H	
	NXTSID	000016H		SP	000006R		VCTLB	020240	
	OBUF	000160		SPACE	000002H		VCTSPC	017276	
	OLDD	002430		SPC	000002H		VCTUB	020236	
	OLDW	002426		SPCADR	000002H		WIDTH	002422	
	OUTBUF	003314		SPCC	000002H		WORD0	000000H	
	PATCH	020374		SPCHDR	000032H		WTCH	002206	
	PC	000007R		START	020300		WTDP	002072	
	PIC2	001134		STAT	002406		WTSP	002202	
	PICK	000720		STRT11	000500		XPRT	001662	
	PRTF	002020		SWEEP	015434	
	PRVBUF	000002H		SWEEP1	015462	
	PRVGN	000002H		SWP.	015500	
	PS	177776		SWP.00	015510	
	PT	002432		SWP.01	015546	
	PTRSID	016352		SWP.1	015552	
	R0	000000R		SWP.1N	015566	
	R1	000001R		SWP.2	015604	
	R2	000002R		SWP.3	015622	
	R3	000003R		SWP.4	015632	
	R4	000004R		SWP.5	015652	
	RADIX	000544		SWP.6	015720	
	RELSCN	000666		SWP.LP	015444	
	RF	000005R		SWP.X	015456	
	RL1	014270		SWP.XX	015474	
	RLFER1	014300		SWPPIT	015764	
	RLFER2	014346		SZ	000014H	
	RLFREE	014200		TAG	177777H	
	RLMS1	014414		TAGID	177776H	
	RLMS2	014464		TEMP	000000H	
	RLRET	014272		TEN	002740	
	RNORM	001044		TENLST	002734	
	ROUT	000002H		TENTH	002730	
	RSTFOR	001356		TOLGE	002104	
	RTN	000002H		TSLOOP	000504	
	RUG	050000		TST.R1	020254	
	RUGMES	000631		TSTMTH	020242	
	RUNE	002004		TSTRTN	020246	
	HAL Runtime System	PALX 222	10/08/74  03:53:27	PAGE 12
	HAL PAL[HAL,HE]	PAGE 2 	***SYMBOL TABLE***      


1.5 WDS AVG INSN LENGTH

20 SECONDS RUN-TIME